﻿Public Class FrmConnect

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Try
            MySQLConnect.MaConnexion.Close()
            MySQLConnect.SeConnecter(TextBox1.Text, TextBox2.Text)
            Me.Close()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try

    End Sub

    Private Sub FrmConnect_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub
End Class